home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 19 / Amiga Format CD19 (1997-10-02)(Future Publishing)(GB)(Track 1 of 5)[!][issue 1997-11].iso / -seriously_amiga- / shareware / comms / other / weatherexperience / arexx / example.wxp next >
Text File  |  1997-08-18  |  516b  |  29 lines
  1. /* Example script for WeatherExperience that prints 
  2. ** some of the data for all cities.
  3. */
  4.  
  5. /* get results */
  6.  
  7. options results
  8.  
  9. /* talk to first WE started */
  10.  
  11. address WEATHEREXP.1
  12.  
  13. /* show which version of WE we are running */
  14.  
  15. 'info version'
  16. say "Running " || substr(result, 7)
  17.  
  18. /* refresh data */
  19.  
  20. 'refresh'
  21.  
  22. /* get data for all cities and print it to the screen */
  23.  
  24. 'getdata wd'
  25.  
  26. do i = 1 to wd.count
  27.     say "In " || wd.i.city || " in " || wd.i.country || " the temperature is currently " || wd.i.temperature
  28. end
  29.